home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 2: CDPD 1 / Almathera Ten on Ten - Disc 2: CDPD 1.iso / pd / 176-200 / 183 / mklib / edlib / isodigit.c < prev    next >
C/C++ Source or Header  |  1995-03-13  |  281b  |  18 lines
  1. /* edlib  version 1.0 of 04/08/88 */
  2. /*
  3.     returns a nonzero value if c is the code for an octal digit, otherwise
  4.     return zero
  5. */
  6. #include <ctype.h>
  7.  
  8. int isodigit(c)
  9. char c;
  10. {
  11.     if (c == '9' || c == '8') {
  12.         return(0);
  13.     } else {
  14.         return(isdigit(c));
  15.     }
  16. }
  17.  
  18.